home *** CD-ROM | disk | FTP | other *** search
- rem %1 == input directory name
- if %in_language% == txt goto english
-
- %cdrom%\_bbs\printh %cdrom% " #a CDROM, #d. Walnut Creek CDROM.\n" > %cdrom%%1\files.%in_language%
- %cdrom%\_bbs\printh %cdrom% " #*-+30#a#d]\n" >> %cdrom%%1\files.%in_language%
-
- %cdrom%\_bbs\get_area other 1 %1 < \_bbs\dirs.%in_language% >> %cdrom%%1\files.%in_language%
- echo path: %1 >> %cdrom%%1\files.%in_language%
-
- %cdrom%\_bbs\printh %cdrom% " #*-+30#a#d]\n" >> %cdrom%%1\files.%in_language%
-
- cd %cdrom%%1
- %cdrom%\_bbs\c %in_type% opus %cdrom%%1 %cdrom%files.%in_language% %in_language%
- goto end
- :english
- %cdrom%\_bbs\printh %cdrom% " #a CDROM, #d. Walnut Creek CDROM.\n" > %cdrom%%1\files.bbs
- %cdrom%\_bbs\printh %cdrom% " #*-+30#a#d]\n" >> %cdrom%%1\files.bbs
-
- %cdrom%\_bbs\get_area other 1 %1 < \_bbs\dirs.%in_language% >> %cdrom%%1\files.bbs
- echo path: %1 >> %cdrom%%1\files.bbs
-
- %cdrom%\_bbs\printh %cdrom% " #*-+30#a#d]\n" >> %cdrom%%1\files.bbs
-
- cd %cdrom%%1
- %cdrom%\_bbs\c %in_type% opus %cdrom%%1 %cdrom%files.bbs txt
-
- :end
- del %cdrom%descript.ion
- %cdrom%\_bbs\c %in_type% 4dos %cdrom%%1 %cdrom%descript.ion %in_language%
-
- cd %cdrom%\_bbs\opus
-
-
-